# Piotr Jastrzebski
# Marcin Nazimek

source('src/utils/log.r')


#	log.log('tree.doIt start')
	library(randomForest)
	
	library(randomForest)
	
	iris2 <- read.csv('data/iris.txt', head=TRUE, sep = ",", dec=".")
	
	test = iris2[ c(1:10, 41:60, 91:100), ]
	train = iris2[ c(11:40, 61:90), ]
	
	colnames(train)=names(iris2)
	
	trainSet<- data.frame(train)
	
	#r = randomForest(Species ~., data=trainSet, importance=TRUE, do.trace=100)	
